home *** CD-ROM | disk | FTP | other *** search
- property pStartTime
- global netID, sessionID
-
- on beginSprite me
- pStartTime = the timer
- end
-
- on exitFrame me
- if (the timer > (pStartTime + 720)) or (sessionID <> VOID) then
- nothing()
- else
- case netDone(netID) of
- 0:
- go(the frame)
- 1:
- if netError(netID) <> "OK" then
- sessionID = VOID
- else
- sessionID = netTextResult(netID)
- census()
- end if
- end case
- end if
- end
-